home *** CD-ROM | disk | FTP | other *** search
/ Programming Microsoft Visual Basic .NET / Programming Microsoft Visual Basic .NET (Microsoft Press)(X08-78517)(2002).bin / ebook / promsvb6.chm / f06ph02x.gif < prev    next >
Graphics Interchange Format  |  1999-04-29  |  19.3 KB  |  800x600  |  8-bit (17 colors)
   ocr: ha, Project1 - Microsoft Visual Basic [break] -EX Eile Edit View Project Format Debug Run Query Diagram Tools Add-Ins Window Help - - M Project1 - CPerson (Code) OX (General) BirthDate (PropertyLet] Private m Lastiame As String Private m BirthDate As Date Property Get Blrthbate - () As Date BirthDate = m BirthDate End Property 5 Property Let BirthDate (ByVal newValue As Date If newValue >= Now Then Err.Raise 1001, m BirthDate = newvalue End Property HE - Locals -OX Projectl.CPerson.birthDate Expression Value Type - Me CPerson/CPerson BirthDate #12:00:00 AM# Date FirstName "John" String LastNam ...